10 DV=PEEK(186):IFDV<8THENDV=8
20 PRINT"[147]":POKE53280,0:POKE53281,0
40 PRINT"[144]LOAD"CHR$(34)"DRIVEN 18"CHR$(34)","DV
50 PRINT"RUN"
60 POKE631,13:POKE632,13:POKE198,2:END
10000 DV=PEEK(186):N$="B.DRIVEN 18":OPEN15,DV,15,"S0:"+N$:CLOSE15:SAVEN$,DV:END